﻿Public Class CongregationAnalysis

	Dim _PublicMeetingAttendance As Integer
	Public ReadOnly Property PublicMeetingAttendance As Integer
		Get
			Return _PublicMeetingAttendance
		End Get
	End Property

	Dim _CongregationBibleStudyAttendance As Integer
	Public ReadOnly Property CongregationBibleStudyAttendance As Integer
		Get
			Return _CongregationBibleStudyAttendance
		End Get
	End Property

	Public ReadOnly Property ActivePublishersCount As Integer
		Get
			Return PublisherData.ActivePublishers.Count
		End Get
	End Property

	Public ReadOnly Property ActiveBaptizedPublishersCount As Integer
		Get
			Return PublisherData.ActiveBaptizedPublishers.Count
		End Get
	End Property

	Public ReadOnly Property RegularPublishersCount As Integer
		Get
			Return PublisherData.RegularPublishers.Count
		End Get
	End Property

	Public ReadOnly Property AuxiliaryPioneersCount As Integer
		Get
			Return PublisherData.AuxiliaryPioneers.Count
		End Get
	End Property

	Public ReadOnly Property NewPublishersCount As Integer
		Get
			Return PublisherData.NewPublishers.Count
		End Get
	End Property

	Public ReadOnly Property InactivePublishersCount As Integer
		Get
			Return PublisherData.InactivePublishers.Count
		End Get
	End Property

	Public ReadOnly Property ReactivatedPublishersCount As Integer
		Get
			Return PublisherData.ReactivatedPublishers.Count
		End Get
	End Property

	Public ReadOnly Property EldersCount As Integer
		Get
			Return PublisherData.Elders.Count
		End Get
	End Property

	Public ReadOnly Property MinisterialServantsCount As Integer
		Get
			Return PublisherData.MinisterialServants.Count
		End Get
	End Property

	Public ReadOnly Property DeafPublishersCount As Integer
		Get
			Return PublisherData.DeafPublishers.Count
		End Get
	End Property

	Public ReadOnly Property BlindPublishersCount As Integer
		Get
			Return PublisherData.BlindPublishers.Count
		End Get
	End Property

	Public ReadOnly Property RegularPioneersCount As Integer
		Get
			Return PublisherData.RegularPioneers.Count
		End Get
	End Property

End Class
